home *** CD-ROM | disk | FTP | other *** search
/ Holt Researcher: American History / Holt Researcher: American History.iso / pc / modules / dbtable.dxr / 00034_Print icon.ls < prev    next >
Encoding:
Text File  |  2000-01-18  |  496 b   |  23 lines

  1. property ancestor, pXMinLoc
  2. global gDBTableVarList
  3.  
  4. on new me, buttonName, castName, xSprite, xLoc, descendant
  5.   ancestor = new(script("generic button"), buttonName, castName, xSprite, xLoc, me)
  6.   pXMinLoc = xLoc.locH
  7.   return me
  8. end
  9.  
  10. on performFunction me
  11.   tell the stage
  12.     playSFX(5)
  13.   end tell
  14.   MyObj = getaProp(gDBTableVarList, GetObjProp())
  15.   print(MyObj)
  16.   return me
  17. end
  18.  
  19. on buttonLoc me, size
  20.   set the locH of sprite the pChannel of me to getAt([pXMinLoc, 563], size)
  21.   return me
  22. end
  23.